home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 001a / tlxum_d.zip / F1-PROT.SLT < prev    next >
Text File  |  1990-05-01  |  711b  |  36 lines
  1. main()
  2. {
  3.   str cmdline[255];
  4.   str BaudStr[7];
  5.   str PortStr[2];
  6.   str FileList[64];
  7.  
  8.   itos(get_port(), PortStr);
  9.   itos(get_baud(), BaudStr);
  10.  
  11.   // get current port number
  12.   strcat(cmdline, "port ");
  13.   strcat(cmdline, PortStr);
  14.  
  15.   // get current comm. port speed
  16.   strcat(cmdline, " speed ");
  17.   strcat(cmdline, BaudStr);
  18.  
  19.   // cts handshake, estimate transfer time
  20.   strcat(cmdline, " ha cts est 0 ");
  21.   if (BaudStr == "19200")
  22.     strcat(cmdline, "11000");
  23.   else
  24.     strcat(cmdline, BaudStr);
  25.  
  26.   strcat(cmdline, " D z pL1024 pa8000 sz -y @");
  27.  
  28.   FileList = _telix_dir;
  29.   strcat(FileList, "tlxum.up");
  30.  
  31.   strcat(cmdline, FileList);
  32.  
  33.   run("DSZ", cmdline, 0);
  34.   alarm(2);
  35. }
  36.